% coding: utf-8

% ----- Informacion sobre el package para el sistema -----------------------

\NeedsTeXFormat{LaTeX2e}
\ProvidesPackage{dccover}[2011/9/04. Para TPs ]

% ----- Imprimir un mensajito al procesar un .tex que use este package -----

\typeout{Loading package 'dccover'}

% ----- Algunas variables --------------------------------------------------

\let\Materia\relax
\let\Submateria\relax
\let\Titulo\relax
\let\Subtitulo\relax
\let\Grupo\relax
\let\Abstracto\relax

% ----- Comandos para que el usuario defina las variables ------------------

\def\materia#1{\def\Materia{#1}}
\def\submateria#1{\def\Submateria{#1}}
\def\titulo#1{\def\Titulo{#1}}
\def\subtitulo#1{\def\Subtitulo{#1}}
\def\grupo#1{\def\Grupo{#1}}
\def\abstracto#1{\def\Abstracto{#1}}

% ----- Token list para los integrantes ------------------------------------

\newtoks\intlist\intlist={}

% ----- Comando para que el usuario agregue integrantes

\def\integrante#1#2#3{\intlist=\expandafter{\the\intlist
    \rule{0pt}{1.2em}#1&#2&\tt #3\\[0.2em]}}

% ----- Token list para las palabras claves ------------------------------------

\newtoks\claveslist\claveslist={}

% ----- Comando para que el usuario agregue palabras claves

\def\palabraClave#1{\claveslist=\expandafter{\the\claveslist\textbf{\large#1}\hspace{2em}}}


% ----- Macro para generar la tabla de integrantes -------------------------

\def\tablaints{%
    \begin{tabular}{|l@{\hspace{4ex}}c@{\hspace{4ex}}l|}
        \hline
        \rule{0pt}{1.2em}Integrante & LU & Correo electrónico\\[0.2em]
        \hline
        \the\intlist
        \hline
    \end{tabular}}

\def\tablaclaves{%
    \begin{tabular}{c@{\hspace{2ex}}c@{\hspace{4ex}}c}
        \the\claveslist
    \end{tabular}}

% ----- Codigo para manejo de errores --------------------------------------

\def\se{\let\ifsetuperror\iftrue}
\def\ifsetuperror{%
    \let\ifsetuperror\iffalse
    \ifx\Materia\relax\se\errhelp={Te olvidaste de proveer una \materia{}.}\fi
    \ifx\Titulo\relax\se\errhelp={Te olvidaste de proveer un \titulo{}.}\fi
    \edef\mlist{\the\intlist}\ifx\mlist\empty\se%
    \errhelp={Tenes que proveer al menos un \integrante{nombre}{lu}{email}.}\fi
    \expandafter\ifsetuperror}


% ----- Reemplazamos el comando \maketitle de LaTeX con el nuestro ---------

\def\maketitle{%
    \ifsetuperror\errmessage{Faltan datos de la carátula! Ingresar 'h' para mas información.}\fi
    \thispagestyle{empty}
    \begin{center}
        %\vspace*{\stretch{2}}
        {\LARGE\textbf{\Materia}}\\[1em]
        \ifx\Submateria\relax\else{\Large \Submateria}\\[0.5em]\fi
        \par\vspace{\stretch{1}}
        {\Large Departamento de Computación}\\[0.5em]
        {\Large Facultad de Ciencias Exactas y Naturales}\\[0.5em]        
        {\Large Universidad de Buenos Aires}    
        \par\vspace{\stretch{2}}
        {\Large \textbf{\Titulo}}\\[0.8em]
        {\Large \Subtitulo}\\[0.8em]
        \today
        \par\vspace{\stretch{2}}
        \ifx\Grupo\relax\else\textbf{\Grupo}\par\bigskip\fi
        \tablaints
        \vspace*{\stretch{2}}
        \begin{minipage}{.8\textwidth}
            \begin{sloppypar}
                \begin{center}
                    \textbf{{\large Resumen}}\\
                \end{center}
                \Abstracto
            \end{sloppypar}
        \end{minipage}
        \vspace*{\stretch{3}}
        \bigskip
        
        \begin{center}
                    \textbf{{\large Palabras clave}}\\
                \end{center}
                
        \tablaclaves
   	\end{center}
    \vspace*{\stretch{3}}
    \newpage
    }
